home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Visual Basic Source Code
/
Visual Basic Source Code.iso
/
vbsource
/
vbpcopy
/
frmvbcm.frm
(
.txt
)
< prev
next >
Wrap
Visual Basic Form
|
1998-10-06
|
38KB
|
1,026 lines
VERSION 5.00
Begin VB.Form frmVbcM
BorderStyle = 1 'Fixed Single
Caption = "Visual Basic Project Copy"
ClientHeight = 5376
ClientLeft = 36
ClientTop = 324
ClientWidth = 7080
Icon = "frmVbcM.frx":0000
LinkTopic = "frmVbcM"
MaxButton = 0 'False
ScaleHeight = 5376
ScaleWidth = 7080
StartUpPosition = 3 'Windows Default
WhatsThisHelp = -1 'True
Begin VB.Frame fraOptions
Caption = "Options"
Height = 732
Left = 120
TabIndex = 23
ToolTipText = "Select the Copy Options here"
Top = 4560
Width = 5412
Begin VB.CheckBox chkNoHelp
Caption = "Don't Copy .hlp File"
Height = 252
Left = 2640
TabIndex = 32
ToolTipText = "Check if you don't want to Copy the .hlp file"
Top = 360
Width = 2532
End
Begin VB.CheckBox chkNoExe
Caption = "Don't Copy .exe File"
Height = 252
Left = 120
TabIndex = 31
ToolTipText = "Check if you don't want to Copy the .exe file"
Top = 360
Width = 2412
End
End
Begin VB.CommandButton cmdOpenOutput
Caption = "Open Output Project"
Height = 492
Left = 5760
TabIndex = 30
ToolTipText = "Opens the VB Project stored in the Output Directory"
Top = 3360
Width = 1212
End
Begin VB.CommandButton cmdOpenInput
Caption = "Open Input Project"
Height = 492
Left = 5760
TabIndex = 29
ToolTipText = "Opens the Input VB Project"
Top = 2760
Width = 1212
End
Begin VB.CommandButton cmdCancel
Caption = "Exit"
BeginProperty Font
Name = "MS Sans Serif"
Size = 12
Charset = 0
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 612
Left = 5760
TabIndex = 24
ToolTipText = "Exists from Visual Basic Project Copy"
Top = 240
Width = 1212
End
Begin VB.Frame fraReplace
Caption = "String Replacement"
Height = 1812
Left = 120
TabIndex = 6
ToolTipText = "Enter the Find and Replace strings here"
Top = 2640
Width = 5412
Begin VB.CheckBox chkCase
Caption = "Match Case"
Height = 252
Index = 4
Left = 4080
TabIndex = 22
ToolTipText = "Set whether to Match Case in Replacement"
Top = 1440
Width = 1212
End
Begin VB.CheckBox chkCase
Caption = "Match Case"
Height = 252
Index = 3
Left = 4080
TabIndex = 18
ToolTipText = "Set whether to Match Case in Replacement"
Top = 1080
Width = 1212
End
Begin VB.CheckBox chkCase
Caption = "Match Case"
Height = 252
Index = 2
Left = 4080
TabIndex = 14
ToolTipText = "Set whether to Match Case in Replacement"
Top = 720
Width = 1212
End
Begin VB.CheckBox chkCase
Caption = "Match Case"
Height = 252
Index = 1
Left = 4080
TabIndex = 10
ToolTipText = "Set whether to Match Case in Replacement"
Top = 360
Width = 1212
End
Begin VB.TextBox txtFind
Height = 288
Index = 4
Left = 120
TabIndex = 19
Text = "Text1"
Top = 1440
Width = 1692
End
Begin VB.TextBox txtReplace
Height = 288
Index = 4
Left = 2280
TabIndex = 21
Text = "Text1"
ToolTipText = "Enter a Replacement String"
Top = 1440
Width = 1692
End
Begin VB.TextBox txtFind
Height = 288
Index = 3
Left = 120
TabIndex = 15
Text = "Text1"
Top = 1080
Width = 1692
End
Begin VB.TextBox txtReplace
Height = 288
Index = 3
Left = 2280
TabIndex = 17
Text = "Text1"
ToolTipText = "Enter a Replacement String"
Top = 1080
Width = 1692
End
Begin VB.TextBox txtReplace
Height = 288
Index = 2
Left = 2280
TabIndex = 13
Text = "Text1"
ToolTipText = "Enter a Replacement String"
Top = 720
Width = 1692
End
Begin VB.TextBox txtReplace
Height = 288
Index = 1
Left = 2280
TabIndex = 9
Text = "Text1"
ToolTipText = "Enter a Replacement String"
Top = 360
Width = 1692
End
Begin VB.TextBox txtFind
Height = 288
Index = 2
Left = 120
TabIndex = 11
Text = "Text1"
ToolTipText = "Enter a String to Replace"
Top = 720
Width = 1692
End
Begin VB.TextBox txtFind
Height = 288
Index = 1
Left = 120
TabIndex = 7
Text = "Text1"
ToolTipText = "Enter a String to Replace"
Top = 360
Width = 1692
End
Begin VB.Label lblWith
AutoSize = -1 'True
Caption = "with"
Height = 192
Index = 4
Left = 1920
TabIndex = 20
Top = 1440
Width = 264
End
Begin VB.Label lblWith
AutoSize = -1 'True
Caption = "with"
Height = 192
Index = 3
Left = 1920
TabIndex = 16
Top = 1080
Width = 264
End
Begin VB.Label lblWith
AutoSize = -1 'True
Caption = "with"
Height = 192
Index = 2
Left = 1920
TabIndex = 12
Top = 720
Width = 264
End
Begin VB.Label lblWith
AutoSize = -1 'True
Caption = "with"
Height = 192
Index = 1
Left = 1920
TabIndex = 8
Top = 360
Width = 264
End
En